









Pa CAM A da PP. ná &| E 
EO PD PS Vá 6 é SR 27 VA é 10 £, dE 
1d Ps do PTE Co AN = ' e 
As q, d 4 A. p - . » . . 
£4,% é - 





P a 
4 , 


a 
? 


é 2 ss EM Ê no 


+ 
= ul 














Clube Z-B0 

Nuvmero 98/51 Maio 1585 
Av. Eoavista, 83J2-L2 T. 
Telefone: 6SiZ7 

4100 PORTO 


NESSE NUMERO 
Ros interessados na limauagdemrm madulna «cunmenzana 
Introducao a linacuacem macuina (Cont.)..eccuancuuoe 


eras DO LOLTUTsanasâncsidaosiada rh SEA O DR 
Livros Spect rum'Breve PanoramiCa..suunucnencncoraa 


PROGRAMAS Zk 81 
Miva Destruido + Mare ssevsnsanassansaanas 


Desenho e Desenho Artistico Simetrilo...c... 
Plot SMCTO Menina SRA RR E TA 


PROGRAMAS SPECTRUM 


ARA roStassasan dass assi CRT E “ua... ua a 


dm ol ta 


uu. ana a 


ehnoOLiOsassRaIT Ra “e... ...... ua..." uu... us "0." a... im 
Concha, Flor, Relogio e Circulo. «esasccanistcenivarncoesamo em KO 
MN sagas esa DA dd E o...“ ww. wu..." a um = 
Qual o estado da memoria?,...acuuvcuuzucas snes nê E "a susana LF 


Introducao a Programacao Estrutiurada 


Tia Ca spitrrasaard dará RE, «« 18 


Us efeitos sonoros e o uso dos alcrocomoutagcores. 


SOFTWARE ZX Fm . = + . w nu w “ * - “ - - “ = “ A “a “ ed a “ “ - * “ - “ a Led “ ”" “ a “a “uu Lad + + “ o = 


SUF TWARE E aires is ssá da sa INVES Rd rRRRRES RSI 


.— — — 


Jeriogicamente crecagmenos cecIcos É 7 
ce Linguacem Macuirna, EsSDeClalmEente ITrrvEnIENTES CE LUTILLIZCITES 3 
ce maquinas ca SINCLAIR 

Em portugal semore se escreveu muiio ZoOUco solre clemas CE 
Nom SEMDVE exISTeE a Coracem ie o 
DUDlicar TEXTOS SODrE CAMDOS TE 
20SSuem Ttradicao ce cominmar. 
PPSESDALMENTE. Ccornnecemos uma EXCEDCAU — Tratarce To enceloura 
“elvas - QUutor Ca “Introducaou a Electronica , 


Q 
cao en CUÊ OS naci oras 


Bi 


recentervmente subliicou C“Írtrocucao aos *icCrocomcutacoves . 

Tivemos acora a excelente curIreca Ce ver «e Doeovam CO amitamerto 
(nara a nova edicao) do livro “"imtrodiucan a0s YicrocoenaTacores 
= cue :rnciui cerca Ce uma Certera ce Dacinas Cecilacças 20 mvareivo 
do codico macuina co Z-80, Com agiictacão n6 ZX Bi ilirec:amense) 
e Com aicumas alteracoes vccera eventia-nmerto cer adelcaço TEmoer 


aa 5SDECT Yu. ” 


Trata-se Ce uma excelente visao ce toco o funcionamento co 
MICTOCOmMmDUTador, visto no sentido cera. * maciirnas Ce sd Divs) = 
Cor uma discussao Co Tico 2ass0 à nascec. no sentida d 

como funcionam os recistos internos co micronrocessace) e Come 
se oocde estruturar um Orocrama em LIPOUADdeEM NAaCcuinas 


| 
0 
E 


Nao cueremos criar rlucoes cemasiado caotimista 
afirmar ? — Ligo 6 livro co Moura Jelvas. SsecCa & COEnte arocrea 
er ilinquacerm macuina! Pra Srogramar em .inauagem a 
BXICE Uva Comaoreensao razoavei Co Tumcicnam y 
nmlICroorocESsSSAaCDOr. =4x10€8 airnca mvuita cisclialina e “setoca cam 
trapalho e uma Doa Couce ce caclerncia. 





Ú que cueremos celxar assinalado nesta 


o Mm 
= 
m 
i 
D 
= 
q 
Ti 
Fi 
Ti 
si 
m 
| 
+ 


LUI texto C.aro, escrito 30 ir q 

activicade ce ensinar e civu.gar condeclimentos. ita J0a lartre ca 

=ua vica. = coue nos temos a 9d0ssLELLLCACE TE CIEENITAT uma Ca Ê 
járitb cas ouvidas (em relacao ao counido macu.ma co L-eso, 21IC 

for lida a nova ecicao ca CLMNTOSODUCÊLU “ls CIDCOMONTERICRES RE 


Ras sivraradSs 


tt 


Sera iaAncaca esses cia 





” "a O é X do E Me “Ef “ q ny .. Ud Me bo. Me HM he E Ne “sr A + é bs + NR, 


INTRODUCAO Ao | | 


- 
.. 
* 


Ç l N G Ú A G E M jr psd E programs E o o pra pé cos S aee. : . 
MAQUINA 


MRE AR DER O OR DR DC SED SO KO SS SEE SS E E 
ad am 
Lado 


Corbiro CAMErO cetro 









Cortiruemos entao. +. codedece. codehex. MNiEMONnICaS 


RUM 1000 


so PA 
Comentarios ao programa 1 14% VA | 
» 38) É Jentidao B EXECUCEO 6% 40 4 de O vitro dm 


+ 


Verifica-se QUE O ErOGT SMB (COMENTETIOS! BFONTtE OU TOGLET 


LAST pers PS ms ram ei ai É * de ps Ee ES 8 |. ne mp RE A qa E E O a 
CMPT Ú Borgo icsdo Mes GUC Em vs bes 1 e Nk. reoT co « PT AMEBAT E 

o NE Vis aids ai dan US o A 
corntrasrsr tidas ( MULtO lento [1 JOocsi1iLr3scao? Í 


SUB EXECUCIHO (cerca do 2 () 
Segundos) L£o ZE LDA» (Hi) 
bt) & estranha confisurscso do (cons colocas em A O contento | 
PEssic (rotina 1000). de 16532) | 
Muitos tecnicos de progremeBcao 
chamem a este tiro de Essic um Pia FE O Lis N | 
“Caslc de seroximscãoo", ou sinús Sa Ra xo di 
“eseudo-Basio"s, rOis rs (com; cumpara o registo à com 
resildade existe Ja nesta rotina estao caractere) 
LM certa afinidade FOOT : 
srroximacao so  Assembler Z80 “30 Lo RET 4 | 
(corndunto de mmemonicas dadas (com: retorno ao Essics s 
eelo fabricarte da der zero) 
msauins)-r3a6g.187 do aAivro JZÃo 
claro aque isto foi intercional “À 
. es na minha orinisos considero (comi salto rara a ROM (ro- 
estas arroximacso uma etara muito b + escreva um caractere) 
importante rara todos os = 
iniciados mo codigo maquinas Su ad INC HL 
(Todas as rotinas dum eroarams (comi asronta HL rara é locsli- 
Que se queiram «cassar s codigo zocso seguinte) 
MEBQUIrnS devemos Em ETIMBITO 
PP ucars ser trsnsformedss EM Vo ra dE, Ni 
"Fseudo Basic"). 133 Su E 
Cc) Interprretacao ds rotins» 64 40 
linha a linha + E saldo ircora 
1000 - coloca HL na localizscao ra esta localizaca 
o da memoria aonde e encontra o 
primeiro caractere da mensagem, Paio - Fim ds codi- 
1013 - coloca em & o conteudo ficacso 


- Msgs Dag 1 Ta E | 
Gts LOCUBLIEZSBCISO 


fê 


no ts. 
DZ Ed 16 


7 a 


7) 
44 5 DD "TT MM di ai 


is A cs cc io ci 


E sã 


vi 


LERAM E naci RA Nº, vos ces A 
10% compesra O conteudo. de IM 
a a ago foca fo põda: Gago” quo pes ter A Li t 2a E etas a 
ko vi = Los cs T 63 Es ia ça E to As eh ( 5 hd + d kb 1d Q dis td 7 + | Loo toa bios duo AND Lea E ETO 19 Lito: Lilith cu td col Às 
| (4 tod, eos = w penitaco tiacaes a do E 60 mMsQuirna nã nxEM À 
do ho Aa tod .0d Nes tod VTtESilALSUO Tica ão o bed *onh uha ve 
of “ad () POR UA So 4e 4% (OQ ! 4 p | A, 
« da 
" | 4» ha coa 4 (p= mn , bege tod tod hs leo W | - 
3 LATHIS LVIAILU - z EM SOS NELE ELET CLS 
: de IA Eai AA Á NANA A ÉS A E di di 
| (1 1º PEIN NA .. . esa to mM a “ . 4 em 
* Dá RS d Mg 1 Da E té 


Na ; se a o (8 
da hos “es , tos o ts Too Fr to pro À ra 


csructere contido em f mica reta li ER E o re 
punha - 120 FRINT,9"3- CODIGO MAQUINA" 
| ” EST Bas é EE | | 


Ee co de Ei Ei " ota [Rg qro Fe ARE CR cair Té dy homo boo À És bots | 
3" ON v3T & sJOCSBLLLBLIU Seguinte 2205 ERINT “INTRODUZA 0) si 
Es ea aos, cia ue 7 4 Us 1PHATNRA, at À TNISLA dd dos del CODIGO 
tia Mto É (q E dh 4.» .. : vs pre pes oe so 4 u 
. beco , 4 287 Ei? 
à Bo à da dess por nho 0) Joá (06 poa pés sam DS co . , tod he saia “ 
1040 rerpeticão do ciclo, Donec lo” “oc ru c 
ds | ! ari 
E de W EE to À a 
E : , 
"oo e NITS A Ee A A 2000 “q ESA SoMRR Ares ae aa . são tod co eba ' fo. tod Sed 7 O Ulou 0% Ê o | “od e" 
tod becos ves U | o 4 E. + i 14 À e =, fool hos Í Ned Ni rs hd am Lo ] ] 44 . cos som 4 a E sem yr v- 
E d e dirão NI 
FA k Ei po PM q ' 
e | de " i | bes f f 
cad 2. To | Go E! 
o é 
á oba 


5 


PI 


| 
| 





gu te 
fara F 


Deris Cie EGSUTEvE) 
ETOGT EM MOMILOT Rue 
irntroducao na REM 1, ds rotinas 
mBaguings seleccione s rotina 3 e 
de entradas a sus codificacso. 


QUARTA ETAPA —- Introducao duma 
linha Esgic que comendo a rotina 
MICUILTIE « 


Escrevas 
“00 RAND USK 16514 
v1.0 STOF 
Grave erimeiro o 
derois 

COTO 500... 


PTOEGTVIMI e 


Come ntarios 80 Frrourams & 


8) fo) EFrOGraMa CumeETre [6 
especificado 
* bx s “xecucso rassou de 20 
SEeGumdos FETrB cerca de 1 
SEGUNÇDO é 

Dutra vantacemi 

à: rotina em Essic ocura 125 


butes a memoria. 

À. rotina maguina ocura grenas 
17 butes, 

Na contirnuszcao do rrocrama 2y 
rodemos sindas 
HPrerlentias que se cgestins no 
fundamental a oOurBr esersco na 
ROMs quando da armezensaem de 


Asdos mensagens ou tabelss que 
ME IS tarde QUELTEMOS TEFTODUZIT 


nO RET Bis. 


O dc 


efectuar mais uma! 


— — tm Mm 


[e rotiria Srreserntaaus 
anteriormente em "erseudortissic" 
trabalha COM linhas ti ts SA 
caracteres QUE y multiriicados 
peElLSS Eu linhas ao ECTrEr 
representam 704 localizações 
ceotives na KAM O auge PTS g 


MELOr parte TOS Cas0S, se torna 


num dGesrerdicio de ocurscso da 
MeMOT IS: 

ASSIM) ro EerempeLO Seguinte 
rreterde-se utilizar 3 MEMOT IES 
srernss rara conter s informescso 
indispersavels omitirndo O & 


PEPSCOS EM Drsnco EM redor da 


MENSAGEM + 


Vesamos entao a srresentacão 
duma tabela ds cortuscso dum 


ei ir Lerdo em contas 


essa Llimitacaãos. 


o) Cu OS py 


sa | R es rs R ' eee: 3 es É 
CirsmMeE 3 NOTINSB & E ESCTEVvVS e 


JOG 0+ CATARUE EMA TERRA) HPONTUACADOX 
AS + ves fel (1! E E é + + + + 3 U E ONT JSXKEE o ad O 
VES +, ce + 0+PONTOS HCRAN. NAVES +. o 
“ EO! INT E: enEROST TOS ++ 588 160» ON 
TOSWx 


Note ques 


ao simbolo (+) corresronde s um 
ESFECO em bDrgrnico 

bjo simbolo (XX) e o csrectere 23 
co vimbulo (XxX) e o caractere 


à É, 
hos E q 


Em seguidas vamos altersr as 
Rotirs em rseudo-Easic (linhas 
1000 a 1055)», substituindo o 
conteudo de alcumas linhas e 
introduzindo outras 

Escrevas 

1016 LET CF1I=A-23 

1017 IF NOT CFi THEN GOTO 1045 
1020 LET CF2Z=A-Zlió 

10253- LF NOT CFZ THEN COTO 1070 
1045 LET Hl=HL+1 

1050 LET A=118 

1053 FRINT 

1060 FRINTO 

1065 COTO 1015 

1070 STOF + = 


Teste a sctuscao desta rotina 
fazendo COTO 1000 e se tudo 
estiver certo deve obter no 
ecran a tabela dos rortos como 
se exemplifica 

JOGO (ATAQUE EM TERRA) 
Porntuscao 

ASTERÓIDES e...» 10 FONTOS 
PEQANAVES ,... Z0 FONTOS 
CRANCNAVES +.+» 30 FONTOS 
DEFOSITOS +... 100 FONTOS 

Rieora reserve 390 caracteres rara 
O codiso msguina escrevendo: 

1 REM 1234367890 1234567890 
1234367090 


FROCRAMA EM CODICO MAQUINA E 
COMENTARIOS 
Loc. Codedex Mnemor e Fscudo-biasic 
LéS14 33 LO HLlsNNI LET tl= 

LU a 1655 

lá & 6430 

17 i12Zé LO AstchL)-LET Az 
PEER HL 
LET CFi= 


LO Zof CF st 





PP a (x) A-Z3 

4 a( JZve LF NOT CFI 
“1. é o THEN COUTO 
c EX (XX, fama é 

£4 MM JZy E LF NOT CFZ 
É RA rs tHEN LOTO 


> 


Loc. Codedex.MremorFPseugdo-tissic 
LESTE Lo Re T Lô "AROM- NB TINA 


Canal To) 
“LET Hi=SML*L 
aUTO 


E! a INC Hh. 
La EA JRse 
> 283 (Zoo ZA) 

E pi INC HL LET HL 
Lotion 


ces 


” E A a Ma . E ' MK sa dt 

tod dera vão do É do dd dos 4 ei ada: E RS 

so 60 INC à 

34 215 RST 16] CRUM-RUTINA 


pos 1] Ro 
E. rs À Ei y 4 
TO Do: 


E pro, ques 
tod “od fo. CRIA 24 ' Ra o. la ) 


36 o JE a GOTO 
2 235 sd Aa 4 ba 
28 201 RET (RETORNO AO 


E: E di dd q 
PT os dolo 4 


instrucoes relo 
chsgmsndão FE 


Irntroduze Estas 

COGLiGo decimsls 
Rotinas 3 
N3o SE ESQUECI GE 
eroarens grnies de ve. 
PÚULS Ode thnaver 

tudo quanto Je fez. 


Gravar e, 
sL010 500» 
erros e reroger 


Comentarios sou rrograms és 

3) O ETOGrEms CumMPETEe [o 
especIficado 

b) o temro de execucao continuas 
3 ser ce srronimagsmente dd 
SEGUNÃO + | 
E) 3 rotinas em cseudocbssic 
ocura locslizszscoes de memoril 

d) 3: mesmas reotins em 
mEguina asreras occurs Z4%. 


ATE Bã0ors nos ErOGTEMEBS JB 
elsborados tilizsmos unicamente 
uma rotina da R0M, a rotina RST 
lé (ESCREVE UM CâRaACIiERE)S No 
entanto temos 3 nossas áilsrosicao 
MuUlLLas OULr Ss RUE FUSOS 
utilizar na nossa proGramseão em 
COdico MEGLULNSS POUuPpBndoO BSSim 
muito tempero e muito espaco ng 
MEMO LS o 


Pora tal teremos ce cornnecer o 
Lnterior io ROM O que LrEMOS 
fazendo 30 loraov deste cCLrsOs 

at y 
Eyes rotiras da ROM codem ser 
SivVvAdLO ES vt 14 grarnçcos GrUuEQOE? 


como co mostra E SOGUAIT + 


pi (IM vm Eron MONS toONr re A 


bhutes om linGUusgemn magulliao» 


0020 = RST 

007E - TABUAS DE CARACTERES 
020 PROJECCAO 
0276 - COMANDOS SAVE 
CE - INICIACAO 


! 


E LOAD 


k 


041% -— EDITORAS A LINHA EBCIL 

0C2o - COMANDO DAS TABELAS 
EL 

OCA FPESGULSA DA LINHA EnGIo 

ODE: - COMANDO DO EASIL 


UrS? - AVALIACAO DA EXPRESSA 
BASIC 

LEG6E - MENTLPULACAO DO PCMNTL 
FLUTUANTE 

- TAEUAS DAS FUNCOES 

CALCULO DO FONTO 

FLUTUANTE 

00 - GERADOR DE CARACTERES 

FE - Fin da ROM 


aê pé 

nã e: 

x o + 

(Ii A 
! i 


Como crodem verificar, 3 PARA. 
Ja utilizado (3 od 16) 
perto dO FriIMELTO GTUFQO) 
contem ass seuanintes rotinas 


=— a 
Ê: 
j 


Let 
6 ti 


Primeiro Gruro de rotinas 

0000 ARRANQUE 

0008 KELATOKRIO DE UTILIZACAO 

00109 ESCREVE UM CARACTERE 

0018 ENCAMINHA CARACTERE DUMA 
LINHA EASITIC 

O ENCAMINHA O FROXIMO 

q SALTO PARA O CALCULADOR 
DE FONTO FLUTUANTE 


00 
OU 


3 t3 


0030 CRIA ESFACO Ná MEMORIA 
0038 INTERRUFCAO M1 FOR CADA 


LINHA DE FROJECCAO 
00464 INTERRUFCAD MN FARA À 
FROJECCÃO EM SLON 


horare Que ss localizavso dass 
rotinss ma ROM esta em numerscalo 
hexadecimal. 


do eroarams és 
Ma ums rotLiria 


Rins TO amoito 
VEMOS utáílizar 


peGrLenmdÇeor E, 6a stOT St TUE La q 
E it Sa Sa e me mer PESE o po qa E oa 
PTS IRCÇAO (UBr o COTÁTio Ca ts 
q ve xi OE Ca saçio nge Ti E ocê eds O a a fa 

Lado Ss de EE RPE, ol es tAte Li (OS E E tah=) Ed Kt d ? 


“ t - ..4 ” a "4% de “1 . sas 1 4 ses .. - LR . vue ves ss “ 
MAILTO LMEQOT Lol | E masvas QU) Llsuaedii 


CM CIST Ss ai o | MOS TRI srs Ele) 


as AnHias (ds MONSSUEM 
emsctamente ro Pronto do ecrar em 


ssa noz sas cd de E adidas = e = To sas SECAS Go DOR 0 O 

Gio QUELTIBINOS QUE ELG BESTECIME. 
Fsra tal vemos sltersr novamente 
& "POTLArmas Ep 


se EULE + 


EeSELLOTLSBSLCUS COMO 


EMEA EEE EMA HERARA MR À 
ta E a o 
0 | 
ves 


a 


| 


SECCHO DO LEITOR 
EEEENESEnaDcanInaDasnaasaasas 


SUGESTOES. . . COMENTARIOS. .. OPINIDES. . . DUVIDAS. , « SUGESTOES. . « COMENTARIOS. +. OPINIO 


a O GU AO to a AS SS O CO o cs CO to co GN GR NO SO OSS Gt O Co GUS O GN GS US iii cn ooo UN io anos ci co ot RO a SO a (ut mo cmo nc nao nt an o qu e tio im sis o mt to au to ento pç otro cr coma e da o O 


*'Ssbiando que existem liveiras 


Ea 
— 


O que €e O MoGuio GersGor 
=, GTIvT te 3 ETOGTeSnaelaely me SOM FPsTrs O ZE 3 À É, 
X81 E ão SPECINUM 2 =" O que e o modulo sersdor 


é Ena do SRA 1) E pp ESC dd É o a. 


e) LG 2 food Gm ar bi dp Li do Coevrosvtireasr E Cro údo CSELÊE NOS 
se. cs é h .ea, 9 ses ... pes por set 2s o ódio - ad sds o. o. uu sus e 
[STE GS 2 OW) Gual Ú MODO TOS EErMLSOE construir O n0s550 


LIM ETOGTrEMS dO LAU PTOFTLO corndumto dt UBVEBTCLeTrêess 


ECTIRUMO pera alem dos Ja existentes ra 
Eua ' Fá 


rara o SF 
JORO FORdEOA mM do LAXBi? Quasi 3 resolucau 
fLisbos deste modulo e que zonas de 
memoris occurs? Como EroOGrsmaB-io” 
EM ETriINCIFIOS Eersticamente 3 — Bira não ta emFortuasl 
tuio O que estã FroOGrameBdo em modulos que permitam uLiil 
PIO dl EST Ú 2x81 FESSE esrSCo de ernderecamento aque & 
ad (oslraves ao ussão celo eco ds kOM, isto e» 
teclado) rara o SFECTRUM. entre B192 e 16383” Se nss onde 
ar PuCEFRUBO e sempre TJerta encontras-los (MESMO GE & 
ausndo existe gasrelo a RAND USK permitam SET rsrte ÚúsQquels 
sr FOP o QREMPÃO» ou FLOT» Oii MeEMOTILS)” 
UNFLOT. 4 —- Umas sugestao: Foraue nao 
Erevemente srSTECETS Li 1MNSerair mo DOLELtim Lt esFr3BCoO 
PrOGTEMNS RARE FSH destinado so Hardware? Ngo so 
sutomsticsmente Mim CasseEve cCoM descritivo nES tambem fornecendo 
"Pr OGTPSMSS Grsvados rara o ZXgL» FrenRiieros esquemas de cornstrucoes 
ir E o À TIMES LelLronicas PST SUumMENTtar ss É 
carscidasdes dos Fequernos micros 


= . sos. dat “hos ada “PnA fes dj H 
REsena como o ZXUL. ” 


MANUEL EORROES/ | 
| 


Nua f 
» 


n 
fu 


cdirecriamente mo SrEeci 


r 


mf A es mr 


Grsmo Llivitio tu f E 


, 
TO CINE TT à Gu wo 7 / vor a 
a a sob - o dog à mad E u ii va DM 
EUuDÁICESIHO mo DDLETLIiM 3 y Po 
wo Des um + es. que, va. es s.., se. 4" jo ma = É em N . et : ed cu me - a ot ... SS POE Dea sata pesa Te. sp o! o sã » oq sos 
IRS Sr had 43 < = Lo dd to Gs med Li ME tiuas ETR E k A e + e te ritd o 4 Ita “ e esta dd EE (3) tt 
cos ave E ee. oee afot amo oo caso pos pç | pe : som cos, ae O o GE Sã Mig 25 is ie aa, RR > A as. esti A Apis 
rig uy tervism sb TIDO (Xico À AR Etasd Ci E avOS, s0110T7T0OS E Õ = O a = 
a a A ROL Re Era A SS Tp e A 6 As a: ara RR, RSS: u np prvi s me 
Cd wii mu ti é ted Mo idlu d cGiicos E => dub MACTOCOM rd: Cv SIOT (o AX tod té ds É Vl ddr VEIO 
EeXEMPELO o s Cy to À Mi PMs lú TumCa ora uete Piero TESFPÓNAE 
Ay WI 73 O Lo te td é do AS [ic o de MO Fodi 1d a > 57 RR A RT ef! (a l 1Y E < “si LA 4 AR, RE o e o id + 
Pe ps rm qe tes, names ec o Use sea, a = Sead 2 > = 1 por ] A doa DO 
1Ccalteo pRecesssrTrias co à 4 ne RE À ds NESO FOSSLULMOS e.emenros 


eae Es AEE] js de sera eg O 205 1 tece RE De a Is ER x 
PST Õ E” to E TNASTA | AntLeresssverme CISTILCLCONLOS FST o Peste oOriat Ps 


s30er cia MS19 sobre LI sta auestsos PELO GLE Fegimos & 


(3 
y 


doc add déa sós dia; TnOS RÃ Cid pl pm pro ojo sos ode oq que, poe a “ pr pe as A ce qo 3 E RS na es sl == pe Co A a So o dh sós og jo 
Ed | bati «> fr) qar A AS > be RA à iodo 1 Roy [1 & ... hos Rod Mi Dá Rca 14 PER Ss 2 LA | k est lh. é 5 (3 dt. tod 1.) E l O e, 7 E ds be IT io > + 
o RE u Cem à ne res Dol pet ai: = EE ea nc A ss np 
MLS cOoMpPLOLOS Ficamos dusde ds & BGLUTrasT. 
po E 2] dê í “s Ps | k, fo pº $ Si e Nm as é e se. . “ + y po. + ee 
PE TILINIAITLZAS  ILIiA A das we o: ds a PA SE: ld Es PMI PIA] dt 
f ; + s 


1 q. Cem rom o ps es ses, PR px pa pol o J .. PR ' PR 
É Lead Eta d Lol Cs qo É cs o Le STA à ta dos Pio ttti do les 
o , Ea dé + 


E. sa ls ade td col sho “ To tel fd Irto é Ros A MS dovettiaco À. 


U PTrUOGTSME o! emrmtoires Clos vteM te 6 o to MOMIALO:S + FPQT 


e o ro um o mas - 


pes k £ . eds po ue, of . à &º ses. A 4 om DOY vor ves +. pal “ - se j dede ** E o .e ' 0 . Ei “4. al. pos »e pos p ada ... ho age ... se .. E a € 

Voo: "Ay! ooo M Todo do À cd Nac Co bo de V ( Te 2 bo Pi lool to! E €9 e trrdiis E ai há Pr, E Sl E Ad E) “es 4 à Cod Vos Ns Le Mil tel tos é À do Cos ca? 

fa fl ee, qe, que «d. RE ee, ves qe h * dé a a pe de pesa vio vo spa nes sa am A ces e 4 E 4 E a de E: ta Er du ERRA A (1 pos, ! 
toé 44 E ( bi sax ay + | 4 dir mad te toi e i Ú te ado b EXd Ger do Set té Led E Ao) sad Pos! ole Ri) oito id dy <> TN o. o (q ado Pos! Sos So? Led BE— H 
À a me oh co; qm Dóris do “4 é «o pes pa pos eu pe ' “o t «a Sd q ão, o rea duo Sor, PS a jo nom seo sets ! 

odo cão vo! bi Cê T Co» quê tod dé 4 do | MS TIS SS vs di + ve tur d , too À ode So Sof o É beso o Roi 1 ii o d VE 


punlicar dA FERUEMNO FPTOGTSMrNS RUE IST Me sde Que O ETOGT Sa 


e. ..— ms + 


de ums adude nesse sentidos EULUSL EM CODIGO MBRULTGS 

o LUBE rode Tforrnecer-inhe um A -— Tambem ros estamos ade | 
ETOETVEMS eUiNTro CORRENTES slornge DU que E necesssrio e | 
(SPECTRUM ak), cujas lnstrucões| colLlsborscao. | 
Lo remeESEnNnDS EM SEFSTSAOs, Lettm — Ow lle sluumo Tres Lizatao | 


Gil LeTiltes es ac Po Lo criado Miles a (Ri 
” a x ; pts ss RD | 

AU Co dE: e 41 + tj) ds Ciclo: P a RIA Rm - 

4 


"EMETvEeT SD RS PULL Luslc)y 


“e 


CnnnmnnaennassaERaERS 


e e 


Juntamente COM Os resrcectivos 


dad DP dd pes .. e .. “ o gn see 
Mi Q M [1 | vo so ( Kd vol ud + 


] poa, A 5 a 
“o ú bos Cos 2% 
qa | f dE dA é Ps | ! Tr. 
+ IR | doce voa to6 "os" Tod «da Lx ; 
i H 
hd .., e . .- 
is e cs f - 
A, 
J boo + 
. ..4 . q d o “e 
ad 6 ES ' ! ES o! te N + 7 44 Sed 
+ É + ( Cu 4 I NS 
Patr e | í + og .2a é E) : e. . poe 
AX ato 4 ad Dê Ego. q do E ROO Sof Paio do ds À as Ted? 
l O do tas GY + to > Moo boo Ga À + Leo No Co So sad 
pos oo . a “a Sa e aéa ] 
GE SEE ! Goo 11 < cos Qua: tod cad i o sd | led 4 4 
ds g 
= =" a W DOU Duas ) df 
Es co e 
f MC db RE dl j 
e a TRE 1 Ro Em A pa À qua, toue qua quo hoo pos 
INES dt Ud V<OVIitLIivto qo tod Dol DS ves RS) 1d tt tod 
se voe (e, vos se. . co .. o eve ... i lo ' a ses 
É mATLS) dO EE, (O Ls ii y ls 5 1º) ad de ASS 
A | - o FR adia ” A od» css sm sit o Dos som. soe 
pers the q pra 004 sed coa s00 “À mA ts qe o sos cer c ria 
Mist LC gSidS OS sUdMossS HO LOSS AEE na 
e o Riits Ti 3 [OO uv dd des ld idol GET A 
"a dº% o T% Pv 4 í e” E. a o , ! 
Fi) UI RLMO SS LT o AM 


FuIMETO 


"rOUT SM MIA Las COQOQMUNPLCECSOS 
E GREEN RD pr o À É a sd E SS : RE mma 
adartado da lirngiusgem LOGO egsra 
“NEI df ” É É dd E PIE a 
Õ LAO AI Qiit Ú Vl E od tdid os o 
E és 2 a RARA a o ae çii E 
desenhar as figuras que quiser 
no CQCTSNIo N 30 St ESQUECLS NLUMNCS 
Eua TS ani od . é a mé e qui O ca ar e piié 
q 3 4LMALLSICÇÕES de PesoL.Lucso ao 
BA GE 
fo EN bed do É 
W UU [Yara us o vox xa La soe pe o. o. «Dé; mp4 o po =. 
O AE Vl! dot iri PURO À Sh mu Gi Us À this o 
ir dal sMEs UlisÃS US Es ves. rs 
ao riLeso F37rI3 O Ci ot WoSÃCs 


T E Olds Va LJ asi t” À Us asia + 
É LaP4i TU DINA da tod Led LP Sed 41 4 

AO qo, com vu ko com 20d 204 e IE à 
/ Ar SIST LS de sed 4) 


P Voo » To » .. | ... ... .. nad .. x e . + PY 
dos Vol 4d dos Led 65 de Food RS SD bol 45% nt dn dates 


4 eos. qro mod Mp LA ado sq 
het 1 4 no? Sed DENSO od 1) Rod “ ' 
aC Da us y t. ES Es 4 
o td «isto to) 2 À RS do WAIT RE SS e 
E | z 1 4 4% 
es 
tg , ' 
! 
h i Y .. E! Í 
41 Mes O LET e + (e 30 
: ba 
de 4d o ca ve de * 
4 é ' 4 T) z , 
di 4% 1 a 1 é 
es H “Px f í + “sa co 
4 Lis cÃs + fed Ad ' | o) led hoo dios Loco bom tod t es 
|| o 
V tod bes, sed 47] ' ed ted dd 4 AIN bem doe + + 
poe, cap (1 
tod É led À v 
. Dose am + À 1 dos bed 
ros vu R 
- nd ' ... 
- 4 


LIVROS SPECTRUM 


BREVE PANORÂMICA 


CELLS EEE EEE EE 


INTRODUCING SPECTRUM MACHINE 
CODE 


Ian Sinclair 
Granada Publishing Ltd. 
151 paginas 


GR di e ci cl de R cade de cd ce EDER à 


Trata-se fundamentalmente de 
um manual de programacao 
elementar, para o 
microprocessador Z-80, 

Constitui um bom 
partida para 
requerendo, no entanto, outros 
dados complementares no que diz 
respeito a instrucoes mais 
complexas. 

Faz-se 
assembler 
deveriam ser 


ponto de 
principiantes, 


referencia ao programa 
ULTRAVIOLET, mas 

fornecidas mais 
informacoes quanto aos metodos 
assembly "manuais", que sao 
fundamentais para a compreensao 
de todo este processo. 

Estamos pois perante um 
conjunto de informacoes gerais, 
que exi gem um aprofundamento 
mais detalhada. 


EEE ERRA 


THE ZX SPECTRUM AND HOW TO 
GET THE MOST FROM IT 


lan Sinclair 
Granada Publishing Ltd. 
130 paginas 


CEEE ES SEER 


Comecando por referir o modo 
como sao feitas as conexoes 
electricas e a ligacao ao TU, 
este Livro passa a exemplificar 
principios de programacao 
atraves de impressoes em 
fac-simile., 

Sao cerca de 70 exemplos que, 
efectivamente, consequem 
ilustrar o ) constituindo 
uma boa ajuda Dara O 
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ti 


hasctante condensados, PEStanas 
normalmente pequenos, | 
=elecortonados nara |uetrar 
determinadas instrucoes > 
me todos. 
És =tagens são em tac-simile & 
atErangem ima extensa ZONA. 
Ai oumas Mac sao mais que 
adaptacoes io CA-2l que, num ou 
Rroutro cas0Q, são perceptiveirs, 
Ti JOS apituias Jegdica-se - 
ONVErSa Je oroagramas escritos 
cara outr ME adores 
» No da =eQquenc - je SÓCECÕE — = e ue cus eos ue ee e o CT O O O q o q qu O O O RO COR Gan ao Sn coa 
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q + r 2) — j ht Ir ? = 
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- rr ER — e e: + 
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POR 


. == 
| 72 


So 
aa 


1IZa 
121 


105 IF PEEK 
Read SSB) 428 ii, soro 


Er] 
md: 


278 PR 
QI DESTRUIDO”* 
— 288 GOTO 


Sa 
- 320 


ISA. > OU N>).' 
928 


19202 


ag PROGRAMA TRAD.E MoDIPU 


Z= 
“PRINT AF Y; Ms 


õ Ra 
- (INKEY $=ºZ* 
e 


O PRINT AT gg 


P e E 
ATRAVESSANDO” 
OBJECT IVÔ 


O a o ad 


Ro ce PRECES, EM- isa fe 


== 
=. 


RE e 
LET = e e 


LET X>PI+PI | RES 
LET U= É 


ds : = = Ê 
LET Y=X+PE EESC or 
LET ESSE aeee 


X=X+ (INKEYg="Mo 
AND x>PTI) 
LET U=tu+ | 


dio 
IF RND>.7 THEN GOTO 46 


BND X<3 - 


PRINT AT RND+15+5,RND+:30; "BH 
PRINT AT RND+*:15+5,RND+*:38; "HH - 


PRINT AT YW.X; 

IF 7=154 THEN Goto 145 

IF T=2208 THEN Goto 145 
(PEEMN 16390+2564PEE 
0=-ê ê= 


G= 
FOR 5B=2 TO 2 
TE. ENKEY Re > Fc 


PRINT AT wW+1,X; 
PRINT AT Y+1,X; 


THEN GOTO 22 
| BRNGM 


e em mm tt ma 
— m— 


++ tê 


PRINT HT 198,8; 
PRINT AT 129,6, "E 
PRINT AT 129,6;” 

IF G= =16 THEN GoTO 


pd E Se Te 
PRINT ART Y. 
INT AT 5, 


“. 


Sos 


918 
FOR 0O=2 TO 8 
PRINT AT 5,7; 


PRINT AT 19-02, 
PRINT AT IS-Q, 
PRINT AT 5,7; “E 


NEXT 
FOR 
NEXT 


CLS 
PRINT AT 8, Q, "DESTRUICAO 


PONTUACRO : 
PRINT... "QUER CONTINUAR? 


BLUVO DESTRUIDO 


18+0, ze ae ae 
16 - ss e 





É 
a TO 208 


TO 
(D 


INPUT à. 
IF 0$="5S 
PRINT, 
STOP 

CLS 

RUN 1Z 

PRINT AT E 


THEN GOTO 9388 
DR OBRIGADO - 


“ALVO DIPILIL 
SEU ROBOT ES 


o CAMPO MINADO. E 
1 +, "DESTRUIR UMA IMPOR 


PRINT, 


TANTE CENTRAL. 


1248 


PRINT Lo, VOCÊ UAI GUIA-LO 


COM AS TECLAS: Ena á 


POR 
PRN ATY- 2 X- -3:"B. A MN Gs = 
- EM Eee 





Sia SEtt ROBOT FF - 


12520 PRINT 
RDA, 


E 
1268 PRINT, 
UA 


BR ESOU 


A 
:: DIREITA. COM SWpPeem 
NDO 
AR CE 


NTR 
2. es. P7 8 tê te 


$ re ee a oiii es” ConNA 
AR 


,. ais » dc .. | = 


AL . 
PRRAU 


s + "CHEGAR 
+» PRIMA 


1299 RETURN 






ES RT “ESCOLHS O TIPO PE OP 
ACAO" É Es 
e INT “"I4,2,3 ME gó 
PRINT ê ss F 
ri DRINT “1? +» 043 a 
65 PRINT "2) - suaTaReSo E 
5s PRINT 3) & a ICT 
E? PRINT “d) «+ ISTO 
"2a INPUT a 
= 75 PRIM ç 
“ 89 PRINT “NIVEL 1,2 Dt a? 
Sa INPUT B fi E 
188 FOR N=8 TOÍ-TE Gg 
119 CLS ires 
124 PRINT “PERGUNTE, MAES - Bê, 
F:” RESPOSTAS CERT 
125 TF N=1IQ THEN SATO 278 
13 LET C=INT (IRIFRaINHES 
140 LET D=IMNT ((IBXISB4NHOS : Eq 
1=8 IF B)E THEN LET D=EMF 212 
Bra! Y 3 34 E fo 
a A Vê B$=STE3 CÓUHAS IESESt>S 
TR D 2* “ 
a EP DRINT ART 18,31;83;7="; ; 
1ê8 cNGuT E 
E- * 
200 TE DAS (UBL AS-CirP.RE THEM 
Exit ll it No 
>18 PRINT “CERTO; PRIME ENTER 
=D& LET F= 41 
224 GUTO 2S EE ta 
S4a PRINT “ERRBDO;, FRISA ENTER 
5a INPUT AS 
268 NEXT N 
371 PAUSE 150 
Ed= PRINT AT 312,8;0B 218 FOMTUS 
co E “:F;" CERTAS "o; 
276 PRINT “EM 284” 0  - 
578 IF E57 THEti PRIME o 
573 IF E57 THEM PRIIS ssare E U 
4 SOBIO BR MATENATICR” 
=5B PAUSE 4004 
283 CLS ar 
LITRO VEZ PRIMB” RD 
ses PRINT QGUBL ELICH E mbdajas an 
229 IF E MKEVS="” Tete DOTE Fas 
238 RUM 
50 SAJE “MATE” 
Zs10 Rtth 
ES”POLHEB O TIPO DE CFEARBCSO 
1,2,3 OU 4) 
dt + SOMA 
EO com SUBTRACHO 
210 + MifT IPLICSCSBR 
á 5 DbIJISBO 


- e am 





Quinaz/ | 
/Porto 





— AAA 





= E A A e 
y ! 
ay | 
am to mto met im e ' 
- 4 H 
1 
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. | ProsraIMa | F.Preces/ 
= = , | : E am — ER os TO «a MET ETA E 
cx oo | DESENHO ARTISTICO SIMETRICC: /Sacavem 


e. me 
.- 













E REM “1OS 
Ss GOTO 5209 
100 LET A$="Budii EE E. 





| ma 
a LET B$&=A$ (INT (RND$25) +42) 
36T Ira 
| o ea ie 4 Nina 116 LET A=RND+20 
| DESENHO | à du 115 LET B=RND+451 
E 120 LET C=28 
7 o -—) es LET D=31 
é % A a id 250 PRI AT B; B& 
E é 135 PRINT AT 


d [EO SOTO 186 
2EM “DESENHO” é = 
BA INT AT PR dA = : 228 GosUB 230 
PRINT AT ii,iia; “SEE Soa LET A=SB+PND+2 


eRUSE Tão ds LET RososanDal 

ae " au EN GOTO 220 
SBINT AT &,0; BIBMREO BORSAA 218 PLOT &R,B 
DE LER PRIMA pts DER LETR 242 PLOT A,42-B 


OCA Pe tah) pa 


16 
28 UNPLOT E4-R, As — se 
225 cOTO 284 a : 
230 FOR J=1 TO 42 

ese PLOT 2, 





| Lã 234 PLOT 2, 
RS 256 PLOT 62,43-J 
a £55 PLOT 63,45-d 
— 240 NEXT 
me 242 FOR J=1 TO 62 
e 244 PLOT J,8 
o 246 PLOT 
15 PR 245 PLOT €5-J,42 
do IF INKE Sea nest do tt 
is W = "* te ee RR - ; ã 
2 EhSur cen ns" concemono-l| cÉis PERUeR TES 
RINT “PRIMA B5 DO s= 
PARA E > TERTEMBESS 300 LET C=e2 
S PRINT “O PSRINEISO FEMTOM e 
23 PRINT AT 18,8; "X%=" dl 546 CET AsCeRND. 
5i PRINT AT 13,6,"7=" Ene 315, LET B=D+*RND 
=> INPUT X É ses PLOT A,E 
23 PRINT PT 18,8;% É 350 UNPLOT E-1,8-1 
as TNPUT Y 335 PLOT A,D-B 
25 PRINT AT 42,8;” 34 UNPLOT &-1,0-B-i 
2E PAUSE Aga SAS IF RND>ERND TREN RUN FZS0 
58 CLS 350 PLOT C-A,B 
36 PLOT X.Y . O CRE ag Laser É Ê 
É am IF INKEY$=" THEM Lãs r="> 365 UNPLOT C-A- -.D-B-4 & 
Re e“ a - ES 4 4 
o = qu a SU er " o — pus + 
í SO IF INKEy$="6" THEM LETOor=Y 412 LET E= =PND £30 
- SS IF INKEV$="4" THEM GUSUS SE 420 LET D=B1 
. DB IF INKEY$=" FHEM LET Waw> 456 PRINT ET ArILBIDS E 
» SS IF INKEVS="8" THEM cosua 48 440 PRINT RT C-RiL.5:Ds 
E ENE E E =H— 458 PRINT ATVE-RITD-B BS a 
o *S IF INKEYv g&="a” THEM BUSUA 3 4EgG PR AT RiS DB: BS 
fr 4585 RUN 480 
EB UNPLOT X | sao LET A=RND+59 
Ss IF X+42 THEN LOTTO oA=5 s1io LET B=RND+rdág 
58 IF X562 THEM LET 4=E2 soo LET C=60 é 
Sa IF w<1l THEN LET yw=ã s30 LET D=48 : 
Gs IF y>)402 THEM LET T=fz s4Aq PLAT &A,B EE 
120 GOTO 38 550 PLOT C-R,B | nm ARE 
529 LET v=7+1 E. s60 PLOT C-R,D-B 
1% UNPL OT Ho f=a e, 704 PLOT A,D-B 
2292 RETURN “Y 586 RUN 598 
5020 LET Y=y-12 | =s000 PRINT "DESENHANDO ART ISTICO 
318 UNPLOT Xx,yY51 5 SIMETRICOS” 
328 RETURN s0610 FOR N=1 TO SS: GS 
42a LET X=X+1 5026 PRINT, ..CINPUT “;nN;" PARRA O 
4iy UNPLOT X-1,Y DESENHO 1 N 
à2%o RETURN 52360 NEXT N 
Sag LET X=X-1 ES sos INPUT N 
=1w UNPLOT 455,7 ] ssa CLS 
s22o RETURN SO?) IF N>5 THEN GOTO 5968 
Eno SQUE “DESEMHA à SOso GOTO N+x+1900 
sig RUN É 





E 
l 

MD 4 
x 


JRuU 

PROGRAMA --- PLOT SKETCH -—- 

ESTE PROGRAMA FUNCIONA NUM ZXE1 COM 1 E DE MEMORIA Ra 

PODE MOVER O CURSOR COM AS TECLAS S,é,.0,.6. COM UM POUCO DE PRATICA, FODERA DESSEM. 
HAFR OS SEUS DESENHOS. 

COM & TECLA CSHIFT 0: FODE ELIMINAR à PARTE DO TRáCO QUE DESENHOU E QUE DEIXOU E 
E LHE INTERESSAR 


PãRa REGRESSAR AU MODO DE DESENHAR USE à TECLA DE «GRAPHICS» 

NES. SOBRE O PROGRAMA vcs... ce quiser usar a instrucao UNFLOT em vez de PLOT = 
betitua a linha SÓ LET RS=Q 

à ARE& DO DESENHO PODE SER AUMENTADA SE TeM MAIS DE 1 k DE HEMÓRIA ..cccc... jm 
INHA BO srcLET XEXMPLANSIITIXEO Danse PD poa arbET TETALTAL)=TT 4d) 

QUANDO QUISER PARAR use a tecla EREAKR 


4 REM PLOTSKETCAhH 


180 LET X=2 
Se LET w=5 
aR LET Racsdl 






Ds, 
i€& PLOT X,Y 
«a IF RS:1 THEN UNPLOT X,Y 
e LET X=X+ (INKEYgG=]"3") -( INKREY 
=03 "3 
0 LET vV=zYy+ (INKEY$g&="]"7") — (INKEY 
Aa ad 
880 LET H=X+(X<1)-(M>550) 
aB LET Y=zy+ Cy <5) -(W>4 8) 
1902 LET RS=56N (RS + (INKEY $E="9") 
- (INKEY E="'0"")) 
116 GOTO 44 





E ANE NA 'Prosrana “ANDROID 


! 
| à 


S0608- 


GO SUB 2008. GO sus p 
PAUSE 


*"“Drima Uma tecta”s: 
2 GO SUB BOBA e 

O IF RND<=.5 THEN PRINT AT 21 
:; PAPER 2; FLASH.1;"E VOCE A J 
AR “:, PRUSE 4 


: GO TO 198 sa 
SO PRINT AT 21,6; PAPER 1; FLA 
mg 3 


SH 1; "SPECTRUM À 
18 
: PAPER à; FLA 
; "SPECTRUM JOCA DO 
*s LET dsi: LET ematd) - GO 
SUB 7000: LET a=1+INT (S=RND): 
IF NOT E AND ata) THEN LET b=4: 
Go TO 180 
150 IF NOT c THEN GO TO 148 
160 FOR d=1 TO 6: FOR e=atdi-Lo 
TO B&B STEP -t. Ga 7000: IF E 
NEXT d | 


THEN NEXT e: 
170 LET azd: LET b=ataJ-e' 


150 GO SUB EBOG: GO SUB 5006: 1 
ET a=2: FOR n=1-TO 6: LET a=a+atf 
nã: NEXT n: IF a=8 THEN PRINT Ar 

1,8; PAPER 1: Fritasm 1: "SPECTRU 
Fi esta à vganhar > INFIS 
T “Prima DUtr3 Var sms tecia”; SR 
NE Z8: GO TD 42448 

150 PRINT AT 21,9; PAPER E; FLE& 
S+ *jVASgOr a soseus sora 


INPUT Q,.o; INK Z; 


' 5870 DATA 


| 
| 


3 


FER 7;“Com quai você ataca Sinaço! 


218 INPUT AT 8,2; PAPER 2; "Buan 
tos VOCE remove Et mit ua ema 
fo seguido por ENTER. ; 

Li” ZO(+º" THEM JF 
D (Zz&>"2“3 AND tzãc= 
Tt b=VAL z$g: IF bc 
& 23 
“ao GO TO cid 


“= TREN LE 
=3 fã; TRER GO T 


SO GO SUE SOBDB: LET 2-8: FOR 5 
=) TO E: LET a=3tatn5s: RENT 5. LT 
PF 3=B TREXR PRIPT AT Es, & ; FoARER 


a; FLASH À; "VOCE GANHOU 
“a INPUT ar nf “Pri 

n3 ENTER para outro 4090" LINE 

Z&: GO TO caia 

24 GO TO 148 

ado REM texto 


2210 INK 7: PAPER o: BORDER GQ: CG 
LS : PRINT PAPER 2;:: a 
DROID NIM 
“e PAPER A; 
da Nim & um jogo a dois, O seu 
parceiro e o spectrum. 
2015 PRINT ** PAPER 2: Escolha 
a Fila, removendo 
quaitque 
r numero de androids 
dessa ff 
Lã. q 
eB28 PRINT *“* PAPER &, INK B;" 
O vencedor € O que remove oO 
Ultimo Android ai 
22380 RETURN 
5200 DATA 7,31,21,17,17,15,7,1 
s016 DATA 7,31,17,25,17,15,7,1 
“220 DATA 7,31,17,19,17.45,7,1 
5030 DATA 7,51,17,17,21,15,7,1 


vB4B DATA 
S,e24,125 
5250 DATA 
G,224,1285 
sSÕEo ro 
&,224,3 


224, 248, 155, 338, 156,24 
cod ,2458,1536.,.208, 135,24 
224 ,246,136,152,136,24 


po 
tL EM Epa E Pê 


bisneto toutes 


— eee 


| =tomw , 
| 9910 FOR nm 


EsrRands Fracos 
/Sacavem: 


224,245,156,155,165,24 


31,19,31,9-3,1,1 
15,11,27 115,19,2,6,18 
255,151,5,53,31,16,45,0. 
2458,208, 348! 194 ,162, 15 


5,128,192 
size DATR 240,205,216,200,207,64 
6136 DATA 255 ,193,192,192,248,8, 
q = 
S2460 FOR n=B TO 13: RESTORE 5996 
IBN: FOR R=USR CHk& tg7+eni TO 
Por CHR$ tovenit7: RÉGO O: PORE 
“R,0: NEXT mn: NEXT 
siso DIM agis,2). DIM bEsD.B): E 
ET ag(tii="QP": LET agter="Pe: E 
ET a$g(tB)="B: LET agta) =" ul 
ET b$(1)="P": LET b$E(Bl=" E 
ET b$(3) =" E 
5160 RETURN | = 
EB0B REM sub to set up board 
6918 CLS : PRINT AT 0.0; PAPER 1 
À | - IDROITD MEM E 
“: DIM at6j: FOR n=1 TO & LET O 
a tn)=1+INT (RND+7): FOR n=i TO à: 
tnJ: PRINT AT Sen,5Em; INK SIM 
ANDES) ;IAGlIrsAT Senti,DeER; FI | 
GI;bELLrsE Se60,0: INB PSA: NEXT 
m: NEXT n 
EB2D RET 
“00 REP sub tóo determine sate (e) 
” unsafe tc=85 
7818 DIM bIS, 


>> 
"028 FOR n=z1 TO €. LET a=atn3: 
F n=d TMEN LET ae a 
TOS LET bin,SF=INT itgazads: 
=3-4 FIT tasas: LET bin,s 
assay: LEFT dia -EINT tavar: 


4,8 1) =INT NEXT n 
2238 DIN e ts: FOR -n=S Fo SS EEEF 
cCtitnsj=st: FOR nai TO &: LET ctnje- 
tetinsi<>btm,n)): NEXT m: NEXT n | 
LET c=ct1)+cC(2)+€ 131: RETUR- 


a” 
vb to point android imo 
£ 


on 

sS+a,8; FLASH 1;a 
a-i: FOR m=1 TO 
(S+RND) : FOR p=2 

FOR q=3 TO 4. PRI 

Egg 4 +s; agtgq);AT 
FEL ad BEEP .B2 

a a NEXT NEXT p: NE 

- n 


LET s=INA 

FOR q=2 T 
+ INK 4+5;a 
K Si bãtpI: 


1 
a 
pi 
= 
fed 
ne ed 
+ wob 


J 
e de 
Em ; 
IN 
o O AR E tas mi: NEXT q: N 
p: NEXT m 
Q FOR n=a+1 TO 6: FOR m=i TO 
nn): LET s=INT (RND+:5): FOR pz2: 
FOR q=2 TO i STEP -i: PRI 
- Eça d+5;38(q) ; AT 
SEN+t+IL,S3SER; INK 


sbê&fPI: BEFP .8B32 
ADE SR AS E “NEXT q: NEXT ep: 
NEXT m: NEXT nn 


5250 RETURN 
90200 REM sub 


b=no. 
=a tas 


to remove android a 
to be cremoved 
TO atai-b+ã STEP 


-1: FOR p=2 TO 5: FOR q=1 TO 5: 
FOR r=1 TO 4: PRINT AT 3x3, 340 j 
INK 7;a$tC);AT S$2+1,3%n; é 

NEXT r: NEXT q: NEXT 

9920 PRINT AT 3+%a,5*n; INK 5; FL 

ASH 1;a&kt4á);AT 3S+a+3,5En; INK 
FLASH 1; b&(3). BEEP/1.,68: PRINT 
ar S%+a,3+*n;“" “AT Ss+a+1,3+e:n;'* 
“ NEXT n 

3930 LET ataj=ata)-b 

| 50406 PRINT AT 3+a,6:a: RETURN 


Pros táma DÍNSLLS “Fernando Preces/ 


SPECIRPNIL OA o base a (Sacavem 

























Esto L E=" 4 IF dê=cm THEN L| 
2520 LET tul,xi)=cã: LET -.x3=x1 
-- LET 




















PAPER 6: INK 7: BRIGHT 4 


190 no S=vÊ: CO SUB ásdol | 
Ren 8 roPtua ATóGiio! PR, asso PBR TUELSOÇSUS BBB ces to 
jás 68 MB AGOS coro soa | BESS VET SESVBAS: LET Oxecndama, | 
130 IF RND>.5 THEN GO TO 1708 E Xena OR Or =0 OR 42=5 OR x2=8 OR | 
140 PRINT AT 21,0; PAPER 2;“ SP | Seio OT (x OR yr THEN GO TO | 
ECTEUO Pas Sour | | 2560 LET f1=0: IF b$(y2,x2)=d$ T | 
160 IF fi=2 THEN GO TO 220 SE oa Tre nas re. 
170 PRINT AT 21,0; PAPER 2;" E Sede CEr HEN GO TO 2610 | 
VOCE A JOGAR ** bg(u2,x2) =C&: LET g3=u2 | 
180 LET cS&="a "> ; j O UR GO SUB 45980: LET J2. 
150 CO SUB sbao a ga ge 
200 IF fi=2 THEN GO TO 228 “*  Seaig dtud,x2)=c% THEN GO TO -| 
210 GO TO 140. a 2600 GO TO 2550 
2280 GO SUB 69209082: E a Re Bla | 2610 NEXT x: NEXT qy 
PAPER 2; "SPECTRUM "; * B886 RETURN. 
o» = com vuter” move 
nãos seu. -eRama EnTER gona UM 3010 LET cosbat: PRINT AT 2,6;" 
1999 REM set up e PRINT AT POR ESSE TO 19: 


NEXT k 
1210 DATA 0,52,4,12,13,5,53,1,59 . s928 FOR knitta ei ; 
AEE bET VE TESE ER 54. ii. 55". 28, | Elggi=stk: LET xi=x (ks. 60 SúsBl 
+ * e õ , | 
5,14,18,50, EE 27,47, 16, 18," 530580 IF NOT fi THEN NEXT 


— =. mem nat Ddr, io e. 
Dido ma 


de Po So de ado af 749010080 a442º 3040 IF Fi THEN GO suB 2560: RET | 
s 2 na | 
19020 x t84): DIM utB4): FOR 4 3950 LET fi=D: RETURN | 
si TO FOR x=1i TO .200 REM print board | 
Ra a LET x ta+13 =x LET qÚy ADIiO ET fi=á 
a+ =u 49020 FOR y=1 TO 8B: FOR x=2 TO gs 
1840 NExT aê pm 42030 LET 93=y4: LET x58=x: GO SUB | 
1258 DATA QB 15,91, 31, a & 45200 
a SR 1248» 238º 2415-391 31,15, '" 4040 NEXT x: NE u 
E e ,248, ip patos bg ' 42580 LET FL=90: RETURN | 
G,0 | 4500 REM print piece 
10688 DATAA- 1,1,49,285, 1L3,7,3,1,128 45120 FOR j=i TO 2 
,4828B, 148, 152, 176,224,192; ÉS ,8,8 asema 0 E =i+ibá& (us, s 753 =** “2 - ER | 
32 ,48,24,12,6,255,255,6, 12,24 ,4 INT AT 1+ $*4B+j,4+23X5; INK 1+%ib | 
3,32 ,28,0 G(luS.xS3S) =" 4"1 : PAPER ?7-((x3+46U833/ 
1070 FÔR n=0 TO 7: FOR n=0 TO 7: S=INT t(x3+U3)22));P$tp,4] | 
RERD a: POKE USR CHR$& (n+CODE | 4ASSBL.NEXT é | 
a“ +m,a: NEXT m: NEXT n ' 4S4D IF FL=D THEN FOR &k: ==3 To 15 | 
1igsea DIM pé&l2,2,2): DIM ag(2,2)5 STEP -1: BEEFP .9868,k: NEXT kk | 
19984 FOR g4g=1 TO 2: FOR k=t TO E: ssa RETURN 
LET pE(i,j,k) =CHR$ (2E4+k+HId II: sogo REM user *s mave 
LET a&ltj,k) =CHR$& (2*x)+k+145): HM s0Q1L0O LET s=1: LET r=2 
EXT E: NEXT q S220 GO SUB 5500 y 
1100 DIM b$(8,5): LET Real o) =" “4 5030 LET da INKEvY &: IF Z&= THE 
LET BSS; 8)=0a: LET b5(5, aj = à GO TO 5903 ad 
és - LEI BBI4A,6)/="a " s240 BEEP 4 eB: LET s=s+(726='"8S 
14186 RETURN AND s<B)-tZzg="5" AND s>1) 
1204 REM evaluate move soso LET r=r+(ZzE=“"B" AND T<B)-(tZzZ 
1510 LET Fi=0 &="7" AND 1 >1) 
1520 LET d3="4": IF cêszdg THEN L 5EB969 IF Z$="B" THEN LET xã=5s: LE 
ET dB&="5º T uier: GO SUB 158084: IF fi THEN 
1539 IF bã&l(yi,=x2]1<5" *“ THEN RETU SO SUB 2500; RETURN * | 
RN S070 IE z&="1" THEN LET €1=2: RE | 
» 1540 FOR gy=-14 TO Z: FOR x=-1 TO TURN á | 
l - ais eo a - . SBEBR BO TO SA24 | 
1859 LET ud=u4i+y: LET x2=x1+k SS00 REM print arrows | 
15680 IF v2=8 OR y2=9 OR x2=8 OR SS LO PR INM AT 2.5," 
. x2=S OR NOT (x OR yi THEN GO TO : 
A IP bétuo S5S28 FOR a TO 1ãa: PRINT BT 5.4 
Ui,xdl =dê THEN GO ; “e MNMEMT i 
2200 SH EESO PRINT AT rStães agtiys 
1580 IF Fi THEN RETURN ss4080 FOR jzi TO &: PRINT HT i+2+&. 
1590 NEXT x: NEXT uy .* T>iSs,dt,aGiZ,SdSI: NEXT q 
1520 RETURN s 5559 RETURBH 
2220 REM eval move direction E 200 REM score 
2010 LET yS3z=42: LET x5=x92 So1% LET a=B. LET E-=8 
e220 LET 43=43+4: LET x3=w34%X: T 56920 FOR vy=i TO &8: FOR x=1 TO & 
F u3=80 OR 43=9 ÔR x3=0 OR x3=9 T 59030 LET a=attbgtu.x)="20: LET 
2050 IF BO ESca RR ue 
> (4U3,x3) =dã THEN x : ? S 
2020 am TI 589050 RETURN 
RB4B IF bg&(4y3,x3)=" “ THEN RETUR 





2050 EM fl=1: RETURN 
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-RELQGIO- 
daptadaoa per Franci 
INDUT “Haras” 


A 


INPUT CMinutcs. 
JF m:50 TREN GO 7 
LET dgd=INT t(arIid): 
INPUT 

IF s)8ã2 THEN 

LET B=EINT 


PRINT nT iãi,lZ;e; 
o O * 


4 


VESES OE] eg PN 


tc 


Ca Le A fa ua put pu que Qu do Jd ps pes ju 
CAI ESSES 


(ty 


im 
Ny 
úy 
de 
pá 


] 


CM Fi dee Cad O NS pe 7 ES 


CA ed TA puta 
Egg Rg 


rm 
[| 


2 Dr e MR 


Iy 
RO LR E a E 


Mlteracoes 


INK 1: PAPER sS: 
LET x=128: LET y 
So SUB 2536 


PRPER 7: INK & 
RETURN 


Sraficos e som no seu 
Us dois programas fera 
Por Francisco Santos d 


SPECTRUM 


*. REM “AR tcontha” 
18 REM Feito POF Francisco 
santos 
28 FOR 9=13582 TO 180 STEP -53: BE 
EP .805.5 
Ss PLOT 8.658: DRAU à ,8,º2ºI: BEE 
= 88,4: BPRAU =. .18.PI 
LS NEXT 9 


sca aantos 


Êo To 
LET e 


EE a BT a 


BND c=êà THEN LET e= 


Ari 


e=i 





BORDER 5: 
=99: LET r= 


àr- 
















4 








Fernando sDantos/ 















+ REM FLOT 
ig REM Feito PROF Frantisco 
santos 
20 FOR 39-18 TO 7TO STEP 5 
sO PLOT 126.58: DRAU -g,0.PI: 
BEER . OS + SB: DRE q * S , PI - 


do BEEP .o5,2: DRAU a,8B,PI: EZ 

SB BEEP .05,3: DRAW B,9,PI: BE 
= 1.083,80: ERAU B . -— +.PI 

OB BEEP .03,2>2: DRAW B,-g.PI: B 
TER 03, &: PREGA O. PI: BEEP 83 
: wa 

?B NEXT qg 





E32R 
2324 
525 
251 
23538 
2558 
PAI +e 
2372 
20204 
38302 
2635 
26d4s 
2550 
asa 
Ze55 
26570 
598 
E/00 
=7i1a 








REM "“Circuto" 

INPUT “x-“;x 

INPUT cysrriy 

INPUT “Rajo”;r 

GO TO 2586 

LET L=INT ((SOR (trt) (ctz 
RETURN 


FOR c=ç-4 
SO SUB 255 


PLOT (x-ti, tys+ci 
CRAUN (2+L),8 
NEXT €c 

FOR c=1 TO F-ã 
SO SUB 2554 
PLOT Ex-L), (y-ca 
PRBU (f241),8 
MEXT €c 

GO TO 25044 


E Q STEP -i 





Us programas RELOGIO e CIRCULO 
podem se usados em contunto. 
Para [ES deverao cer incluidas 
as instrucoes constantes na 
lista de alteracoes, à Juncaa da 
um melhor efeito visual. 

Lim x =ugestad mr caso queira 
comecar co programa com 0:00:00, 
introduzir a sequinte linha 

LO LET a=h: LET tb=0 LET c=Q 
LET d=0: LET e=h: GO TO Sol 


E — 
LJ 


E 
qu 
o 
1 


- G6+ | 


SU-"0 - 


o robot e 


ea: 


ins 


|-Z1i0 


trucoe 


ETA 


bloca 


Ig 
th 





's| Õ 


te 


introducao 


roca t 


E. 
mt 


ju 
sd 


=: do blaco 





mu 


L5 


% E a 
JOGO N-1 PLASTERS=20 


1 CLS : FEM “escape” 
= PRINT “Programa para 
IR SPECTRUM 15 o 


s POKE 296548,8: REM caps 


actuando 
1 DATA EIN 2290110082, BIN 901 
Erg BIN g110641183,BIN 110890011, 
GiísiLiIz, BIN 26111188, BIN 11 
SI, BIN DiiOBILIS 
45 LET a=zBIN Q4ILIlIIJIA 
23 DATA” G,2,a,a,ã,a ,a,8 
so FOR b=146 TO 147 
á2 FOR c=0 TO? 
POKE USR CHR$ b+rc,d 


74 NEXT b 

4104 REM “escape AA 
4118 FLASH dA: RINT Ar 318,6; “CDes 
Ligar o gravador” : FLASH GO: PAUS 


E 200 
129 CLS PRINT “O OBJECTIVO DE 
STE JOGO CONDUZ IR Oo ROB 


= 
OT ATE RO PONTO- Hº 
4130 PRINT AT 4,4; “PARA MOVER O 
ROBOT USE AS TECLAS 5,6,7;, 


140 PRINT AT 8,8; INFELIZMENTE 
O ROBOT TEM POUCA Ra E CON 
TRA OS BLOCO ARA A A a ts 
E IMPEDEM Ss” SEUS VIMENTOS" 

154 PRINT AT 15, 10; IMPORTANTE” 

1860 PRINT AT 27,8;* *O ROBOT AFER 
AS SOBREVIVE & 28 IMPACTOS, APPO 
5 OS QUAIS FICA INUTIL IZADO” 

17Q PRINT AT 21,06; “ s+Quatquer te 
cita para continuar” 

1i&a PAUSE OQ 


190 CLS 
280 PRINT AT 12,1;'se e impossí 
vel para o robot chegar a casa 


(3), Ed + use a tecta à e abo 
rtara ogo“ 
Lia PRINT AT 18,7; “use quaitquer 


tecia” 
LES EvSs-AET Fado 


Z2o PAUSE O: 
238 LET L=0 
PAPER 6: INK B: TC 


aád BORDER 6: 
is 


— 


metas DU CPAD Gas o e - am 


| ed 


DSO LET AR=26.: LET B=s 
260 PRINT AT 21,2; "JO N-":E-s 
278, PRINT AT 21/15; "PLASTERÔO 
E PRINT AT B,Q; "HH" 

[298 PRINT AT A,B;"R": REM GRAPH 
380 FOR D=1 TO E 

são ERcRs É 

AT INT (RNDsS22F. INT | 

RND+32);"N". REM cRAPIC DD º 

332 NEXT O 

242 PAPER 
NDSB, PRINT AT INT (RND433, INT (Rh 
2358 IF INKEvYg="1" THEN GO TO 71 
378 IF.  INKEY $8="5" THEN PRINT ar 
p,B;” =B-1: LET L=4 

382 IF. INREy $="5” THEN PRINT ar 
A,B;' LET B=A+1i: LET L= 

598 IF, INREYS= "2º THEN PRINT ar 

A 


88 IF. INREV4SS 8“ THEN PR 
Bu N PRINT AT 

A,B;0 »: LET BaB+4> LEFT It ud 
418 IF A<Q THEN LET A=g 

428 IF R229 THEN LET A=2e0 

430 IF B<B THEN LET Bs 

440 IF B>31 THEN LET B=31 
BSS IF ATTR (A,B)=16 THEN GO St 
5680 IF A=8 AND B=Q THEN GO TO 5 
— 

L78 GO TO 258 

+32 LET F=F-i 

494 IF L=1 THEN LET B=B+1- 

SB IF L=>2 THEN LET B=o-1 

Sig IE L=3 THEN LET R=8+1 

S20 IF L=4 THEN LET B=B-1 

S0O JE NO THEN PRINT AT 21,25; 
“B": PRINT a PRINT AT 
18, is; CFEM: paúSÉ Seg: Go To 72 
s40 RETURN 
| 8886 BORDER S: INK 1: PAPER S: € 
Rui 

SE9 FOR S=1 TO S 

578 INK 5 

S28A FOR A=0 TO 1 

SSB PRINT HT 10,10; “CORRECTOS 
Sm PAUSE 19 

810 INK 4 

aDA NEXT A 

638 NEXT B 

842 INK 1 

880 PRINT AT 4 
Edge: 2,7; "CONSEGUE REP 
678 PRINT AT 14,7;"USE A TECLA 
“SPACE” 

680 IF INKEY$=" "“ THEN GO TO 69 
68S GD TO 558 

200 EO TO 248 

720 E a 
7ZiQ PRINT AT 18,12;"ABORTOU 

720 PRINT AT 12,6; "USE A TECLA 
“SPACE "* l ca É 
725 PRINT AT 14,4; “TECLA “Nº PR 


Rã TERMINAR" 
a” 


7360 


INKEY $=" “ THEN CLS : PA 


JSE SG: GO TO 1280 


735 
SA 
748 


758 
Ie 


IF INKEv$=“NO THEN GO TO IB 


GO TO 246 
CLS :- PRINT AT 10,2; "QUALOU 


ER TECLA - LIMPAR MEMORIA”: PAUS 
= 


= W: 
13201 


NE 
SAVE “ESCAPE” LINE 1 


.0 - posicao inicial do robot 
cs0-270 — scares 

LS0 - posicao de H iponto de 
Chegada) 


"rt — desenho do rotat 


toráfico 


3S60-400 - controle de movimentos 


do rcochbat 


410-J40 - mantem q 


robot nao ec 


10 - calis 


PROGRame ZE 


Fm 


ao do robot 


Fm aPSGâDO 


orafico da 


ponto de chegada "H" 
420 — inicia de nau Cu fu 
dcu-Ssgo - fim da [O30. aquando 
"Blasters'=s 

36 - grafico “e' 
SJ0U-430 - “"carrecto" Myando q 
robot atinge G obiectivo 
Sol — tecla para iniciar q NEGO 
10-100 — quando usar a tecla 

1 abortar cr Euiata 
NOTA —- SE UTILIZAR & TECLA N, O 


Dê MEMORIA 


2 = = no. -” ge = — -s4 poa .- am 
Com 2st2 programa inserido no final do se: programa 


: / 
pcdarã em qualquer 


altura, sater qual o astado da memoria, em termos de qual o espaço 


STOP 
PRI 


A R sda E Reaç | Psi ' 
“lo programa, quer 5 espaço ocupado pelas variáveis usadas. 


> 


HT "ZX8Í-MEMORIA TOTAL=";CCPEEK 16388+256kPEEK 16389)-165354)/1024;"K” 


9497 PRINT ,, "PROGRAMA EM BASIC'",CPEEK 16396+256XPEEK 16397)-16509;" BYTES 


9993 PRINT ,. "VARIAVEIS ",CPEEK 16404+256%PEEK 16405)-(PEEK 16400+256+PEEK 1640] 


) 
z 


-15" BYTES" 


999 PRINT ., "MEMORIA LIVRE". <PEEK 16333+2564PEEK 1698 


405);" BYTES" 


enoiz TLM 909% 


»=( PEEK 16404+236%PEEK 16 


Lj 


—— — . ss us us mem ms — —— — 
o O SO RD SS EDS CEO CD UT e e IO EN RN AT O, ENTE, EEE 
O O o CONGO coa o CS ASAS CEEE CSEROS CESTO GUEST CUSTO AO CNN Tm co cm cn A IA 


— A -—- - » 
U ESTA vLAILYU D à MEMORIA Sr 
Dt MM 
==3== 
a inserido ro final do seu precrama, prdera em qualquer 
astado da memoria, em termos de sater c asgaço ocupado 


sapacidade da memoria da sua maquina, tambem obtem 


a, = — 4 . -—- q -. - “ : 
yariaveis e ainda tem um relogio que começa a funcio- 


prograna para a linhe 9997 ( CAPS e PREAK ) e 


3997 DEF EN p(n) =PEEK n+25S6+PEEK 
n + 


(n+1 
9998 CLS : DRAU 255,0: DRAU 0,17 
S: DREU -255,0: DRAU &O,-175: PLO 
T 40,158: DRÁW 127,0: PRINT AT 1. 
:SivStatus da Maquina..“;AT 4,3; 
Toótal MEMORIA RAM :“; (EN ptês?o 
32) -163853) /1024;" K";AT 6,2; "Mic: 
rodrive Haps:";EN p (29691) 25754 


;" bytes“; AT 7,2;AT 8,2; "Program | 
a Basic : "4 EN p (23627) -FN Pp (2565. 
S);'" byutes“;AT 9,2; Variaveis 
:“FN p(t23641) -FN p (23627) -1 
:* butes“";AT 11,28; "Espaco Livre 7 
due Ea P (25730) -FN p (23642) ;* 
bytes“; AT 19,2; "UDG: ABCDEFGHIUKL. 
MNOPGRSTU" 
9999 PRINT AT 14,2; Tempo actua: 
L [CS INT í(ttFN pP(í23672) +ESSIEBIPE |: 
nr > ido ini segundos": GO TO | 
-— | 


18 


++ ' 
1% 
“SAR P 
e. 
. =. 
1 
» T% 
] d 
tos va. 
, 
.. 
do cos ces + - 
f 
nd cao "ua loud que 
. o vos ou 
.. 
“à sho & -— 
, 
d voo cus os usa 
“a 
bh . 


“a + 
be cos 4. . 
Ae 1 Critics 
1 
“= * 
sea My 
“und ] 
fe e 
“a «pa Loo » 
tod & W sed d 
pe, o. poe 
(TT Ses too “ont 


Roe, qe do 
1 RoS qo 4d 


eva, poa 
tes foo 

de sapó tc 1% 
Mod hos À d tuo! ade 


e + 


.. 


'end Tas dd 


4 ' “+ 
“+ 
Us p 
, 4 


Es A A 


. 
. ee 
pod 6 q 1 
sto À 
4 nã 5 
+ Sdd th “ 
nl vw 1] 
“| ”. 
(CT 
á tod 
t . ... 
. 4 e 
4 Y , 
] 
“ “+ » 
.. 
1 + 
PRETA 4 dá 
+ 


vas 


As 


... 


“a 


ved 


= 


(= 
Nos 
“s 


l 


f 


4 


Na 


tod 


Neo 


Ú: 


.,., 


14 
1 “4. 
4 a 
..0 «ed 
* 
poe 

+ 
+ 1a 

i 
. 

.. 
+ 


e 
Sado 


se 


4. 
+ 44 


<+ 


bes 


lui 


Nas ads 


2M 


“<a 

'esh 

4 

ps 
O) 

“> Ra 


44 Sor 


vãs Vos 


Ns 


«Sad Sos 


+ 
... 

|) 

2 “hd 


| 
5 de 
i 
| “God 
to? cod 
+, 
| 
o. co» 
pod Tod 

A 


Clos TT 


4 


-— 


[99] 


| <5 
ne 


4. Ti 


| à 5 


p= 1 


p 


or 


y e 
E PE 
: 
Lo o! ft 
% .. 
R h. 
tee. ... 
AR A A 


e + 


ed 
à Lo A 
“. = 4 
o. qoo 

] l. | 


da, es, 
+ á 
o) 
q 
“+ 


ted Ls 


nd ue. 


2. e. nos, Sm po t . o - 4 7* 
ir sr + ' . , | Doo ado Sed vo? P 
1 
v +. 4 + « 
./ & qse | ' Cs 1 
tee | dh A 
. 
docs Voo É à "ond Sed "14 1 asi CO do te Soo 3 he 
, , 
+ LIRA Poet | Dhco cho Soo t Too 
bed od 4d 6 
q “1 ) aa &, ; .á 
| tod b | hod Nas Vos tod too Mod d | cod cão cod td Sos 
ao ste Tod .. sad fest . ves + us oa 
o 1 lose : 
ves hos 4 k de 54 Soo cd 1 “uod 
"a. .. és ve. - .. -.. ca 
y ta > E ode do td td) 
dis Ahad ol q do Vo Vas ba tod 
« o . se. 04 poa 
1 , “ 
TO med] Ui ibod boda W VS do Tod 45) | q 
à dh 4 05 04.9 Pod ode | e 
. di sã qa o" 


He 


sea 


ua .. ..+ 


a E «> 


... 


PR E o 
tod do sed NY 


++ 


cho sto Tod 


- 


q 


no. e. vos « 


c+ 


PA es (3 dus 
.. 


es" | À vod “4 
+. 
de Seas 
2 *w i od 
PP | Sã “od 
ted é . 
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OS EFEITOS SONOROS E O USO DOS MICROCOMPUTADORES 


Todos os que possuer o modulo GERADOR DE SOM do ZxXai 
estarao a obter o efeito que pretendiam, cuando accuiriram acuele 
periferico ? 


Certawmente que nao! O efeito obtido com esca exnansao do ZX &1 e 
bastante diferente do efeito sonoro obtido com nrocramas 
executados pelos possuidores do TI 39-4A (Texas) ou do COMMODORE 
b4. 

Igualmente chamamos a atercao para quem planeia adouirir o BEC ou 
o SPECTRUM com a princival finalidade de obter efeitos sonoros. 
Um microcomputador que permita procramar efeitos sonoros (MUSICA 
por exemplo), devera poder intróduzir atraves do teclado, um 
programa, por exemolo * 


100 TONE=iI0 

110 FOR COUNT=i TO 10 

120 CALL SOUND(-500, TONE, 2) 
150 TONE=TONE+I 10 

140 NEXT COUNT 


1350 END 
este pequeno programa para o T1I/99 toca os toms 
ranidamente 
Com a simples modificacao da linha 20 E CALL 
SOUND (+500, TONE, 1) passara a tocar 10 tons lentamente 


Mas toca como ? 


Em principio para que tenhamos uma audicao correcta devemos obter 
o efeito sonoro atraves do nosso televisor. O som e modulado e 
conduzido atraves do cabo da antena, podendo entao regular a 
altura do som com o Dpotenciometro habitual, tal como o fazemos 
quando observarmos um programa de TV. 


Desaconselhamos efeitos sonoros atraves de altifalantes 
adicionais porque geralmente a ocqualidade nao e boa e 
especialmente o VOLUME e insuficiente. 


No caso do SPECTRUM a modulacao em Inalaterra funciona tal como a 
maquina havia sido projectada, Ot SEJA DATA CLUE O som Sera 
transmitido pelo aparelho de Tv. Em Portugal, nao temos outra 
solucao que nao seja «««u. 

1lÓO FOR I=-60 TO 69 

20 BEEP .Z,1 

dO NEXT 1 


ESTABELECER A LIGACRO ENTRE "EAR" (do Spectrum) E "MIC" (do 
gravador) ATENCAO COLOQUE AS TECLAS =PLAY= e =DBLISE= ACTIVAS 
no seu cravador, pode agora accionar o programa com RUN 
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Ira escutar toda a escala musical atraves do amolificador e 
altifalante do seu gravador . O som nao tera um volume muito 
apreciavel mas sera sem duvida muito melhor do cue andar a eraquer 
o seu Spectrum ate junto do seu ouvido para escutar o efeito 
sonoro. Nesta amostra de programa, a imstrucao EC2EP e usada Dara 
obter o som, logo sequida da Cduracao e da frecuencia, nortanto 
quando o ciclo FOR-NEXT e executado sera ocercorrida a escala 


entre -6b0 e +60. 


Voltamos a questao inmnicial,cue e a seouinte +: Esta a cDter 
efeitos sonoros com o seu microcomputador ? 


Nos dizemos que a melhor maquina para este tipo de realizacao = 
(neste momento) a da TEXAS -T1I/99..... se os seus resuitados sao 
diferentes dos nossos e se vor exemolo 1a consequiu algum efeito 
espetacular com o MODULO DE SOM do ZX81i ou com outra macuina, 


entao escreva-nos a dar as suas imDressçoes, 


. o 
um do 
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